home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 89xx / 8907a.d64 / teil 2.listing 2 (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  587b  |  22 lines
  1. 10 .BA 49152
  2. 20 .GL IRQVEC     = $0314   ;IRQVEKTOR
  3. 30 .GL IRQALT     = $EA31   ;ALTE IRQ-ROUTINE
  4. 100 INIT SEI;IRQ SPERREN
  5. 110  LDA#<(IRQNEU);IRQ-VEKTOR AUF NEUE
  6. 120  LDX#>(IRQNEU);IRQ-ROUTINE STELLEN
  7. 130  STAIRQVEC
  8. 140  STXIRQVEC+1
  9. 150  CLI;IRQ WIEDER ZULASSEN
  10. 160  RTS;UND ZURUECK...
  11. 170 ;
  12. 180 DEINIT SEI;IRQ SPERREN
  13. 190  LDA#<(IRQALT);VEKTOR MIT STARTADRESSE
  14. 200  LDX#>(IRQALT);DER ALTEN IRQ-ROUTINE BELEGEN
  15. 210  STAIRQVEC
  16. 220  STXIRQVEC+1
  17. 230  CLI;IRQ WIEDER ZULASSEN
  18. 240  RTS;UND ZURUECK...
  19. 250 ;
  20. 260 IRQNEU INC1024;1024 INKREMENTIEREN
  21. 270  JMPIRQALT;IN DIE ALTE IRQ-ROUTINE
  22.